pck_encounter_intake
Lines of Code: 412	

procedure GetEncounterFlags(pi_vSessionID       in varchar2,
pi_vSessionClientIP in varchar2,
pi_nUserID          in number,
pi_vEncounterID     in varchar2,
po_nStatusCode      out number,
po_vStatusComment   out varchar2,
rs                  out Pck_Utl_Common.refCursor)

	get all the flags for an encounter 

procedure GetEncounterIntakeFlags(pi_vSessionID         in varchar2,
pi_vSessionClientIP   in varchar2,
pi_nUserID            in number,
pi_vEncounterID       in varchar2,
pi_vEncounterIntakeID in number,
po_nStatusCode        out number,
po_vStatusComment     out varchar2,
rs                    out Pck_Utl_Common.refCursor)

	get all the flags for an encounter intake 

procedure getIntakePatientID(pi_vSessionID         in varchar2,
pi_vSessionClientIP   in varchar2,
pi_nUserID            in number,
pi_vEncounterID       in varchar2,
pi_nEncounterIntakeID in number,
po_vPatientID         out varchar2,
po_nStatusCode        out number,
po_vStatusComment     out varchar2)

	Get the latest uncomplete encounter for this module 

procedure getIntakeAltLang(pi_vSessionID         in varchar2,
pi_vSessionClientIP   in varchar2,
pi_nUserID            in number,
pi_vEncounterID       in varchar2,
pi_nEncounterIntakeID in number,
po_nOutAltLang        out number,
po_nStatusCode        out number,
po_vStatusComment     out varchar2)

	Get alt language for the encounter 

procedure GetEncounterIDFromModule(pi_vSessionID       in varchar2,
pi_vSessionClientIP in varchar2,
pi_nUserID          in number,
pi_nModuleID        in number,
pi_vPatientID       in varchar2,
pi_nTreatmentID     in number,
po_vEncounterID     out varchar2,
po_nStatusCode      out number,
po_vStatusComment   out varchar2)

	Tries to retrieve the encounter ID for the passed MID. If there is no encounter, it inserts a new encounter of type 7 (portal visit) 

procedure NewEncounterIntake(pi_vSessionID         in varchar2,
pi_vSessionClientIP   in varchar2,
pi_nUserID            in number,
pi_nModuleID          in number,
pi_vEncounterID       in varchar2,
pi_nAltLang           in number,
po_nEncounterIntakeID out number,
po_nStatusCode        out number,
po_vStatusComment     out varchar2)

	get the the encounter_intake_id.  It checks for the existance of a record by checking the COMPLETE field.  If null, then there is no record.  In this case it inserts a new record. if complete exist and 0 then it returns the current id. NOTE: It should never be called for a completed module 

function GetPiece(strData      in varchar2,
strDelimiter in varchar2,
nPosition    in NUMBER) return varchar2

	get a piece of a string given a delimeter and a position 

procedure GetResponsesCountRS(pi_vSessionID       in varchar2,
pi_vSessionClientIP in varchar2,
pi_nUserID          in number,
pi_vEncounterID     in varchar2,
pi_vMIDs            in varchar2,
po_nStatusCode      out number,
po_vStatusComment   out varchar2,
rs                  out RetRefCursor)

	get all Encounter Intake Responses count recordset 

procedure GetIntakesForReviewRS(pi_vSessionID       in varchar2,
pi_vSessionClientIP in varchar2,
pi_nUserID          in number,
pi_vPatientID       in varchar2,
pi_vEncounterID      in varchar2,
po_nStatusCode      out number,
po_vStatusComment   out varchar2,
rs                  out RetRefCursor)

	get intakes for review recordset 

	

